www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\Model\ComponentLabels\电话输入框控件\do_add_mode_label.asp

    <%'$start_ext_newDsoft 以下系统生成,勿删!
'$newDsoft_label_type$:asp_label$end_newDsoft_label_type$
'$newDsoft_label_name$:$doaddmode$-ComponentLabel-$$end_newDsoft_label_name$
'$newDsoft_label_sql$: $end_newDsoft_label_sql$
'$newDsoft_label_params$:inull,是否允许空$end_newDsoft_label_params$
'$newDsoft_label_fenye_num$: $end_newDsoft_label_fenye_num$
'$newDsoft_label_beizhu$:在添加页的处理页里的标签$end_newDsoft_label_beizhu$
'$newDsoft_is_sys_label$:0$end_newDsoft_is_sys_label$
'$newDsoft_other_params$:htmledxa:|htmledxb:$end_newDsoft_other_params$
'$end_ext_newDsoft%><%
if $mypost$value$="" and cstr($xxvar$inull)="0" then
$page$is$vaild$=0
$page$err$msg$=$page$err$msg$&$field$mybmname$&"不能为空!\n"

end if

if $mypost$value$<>"" then
Set RegEx = New RegExp 
RegEx.IgnoreCase =True 
RegEx.Pattern = "(^(\d{11})$|^((\d{7,8})|(\d{4}|\d{3})-(\d{7,8})|(\d{4}|\d{3})-(\d{7,8})-(\d{4}|\d{3}|\d{2}|\d{1})|(\d{7,8})-(\d{4}|\d{3}|\d{2}|\d{1})|(\+{0,1})(\d{2,4})-(\d{4}|\d{3})-(\d{7,8})|(\+{0,1})(\d{2,4})-(\d{4}|\d{3})-(\d{7,8})-(\d{1,4}))$)"
if RegEx.test($mypost$value$)<>true then
$page$is$vaild$=0
$page$err$msg$=$page$err$msg$&$field$mybmname$&"的电话号码格式错误!\n"
end if
Set RegEx =nothing

end if

$mysave$value$=$mypost$value$

%>